home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
126-150
/
disk_143
/
rim
/
rimsrcami.arc
/
BLNKFL.BLK
< prev
next >
Wrap
Text File
|
1988-01-05
|
331b
|
14 lines
C
C *** / B L N K F L / ***
C
C COMMON BLOCK TO COMMUNICATE BETWEEN SPOUT AND SELECT
C
COMMON /BLNKFL/ BLNKFL
LOGICAL BLNKFL
C
C VARIABLE DEFINITIONS:
C BLNKFL--FLAG TO INDICATE IF SPOUT PRINTED A LINE
C .TRUE. SPOUT PRINTED A LINE OF DATA
C .FALSE. BLANK LINE
C